home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
kermit.columbia.edu
/
kermit.columbia.edu.tar
/
kermit.columbia.edu
/
newsgroups
/
misc.19970929-19971216
/
000147_news@newsmaster….columbia.edu _Sun Oct 19 23:55:56 1997.msg
< prev
next >
Wrap
Internet Message Format
|
1997-12-15
|
2KB
Return-Path: <news@newsmaster.cc.columbia.edu>
Received: from newsmaster.cc.columbia.edu (newsmaster.cc.columbia.edu [128.59.35.30])
by watsun.cc.columbia.edu (8.8.5/8.8.5) with ESMTP id XAA00241
for <kermit.misc@watsun.cc.columbia.edu>; Sun, 19 Oct 1997 23:55:55 -0400 (EDT)
Received: (from news@localhost)
by newsmaster.cc.columbia.edu (8.8.5/8.8.5) id XAA19483
for kermit.misc@watsun; Sun, 19 Oct 1997 23:55:54 -0400 (EDT)
Path: news.columbia.edu!panix!howland.erols.net!news.mathworks.com!mvb.saic.com!news.eskimo.com!jimo
From: jimo@eskimo.com (Jim Osborn)
Newsgroups: comp.protocols.kermit.misc
Subject: login script beeps unexpectedly
Date: 20 Oct 1997 03:42:45 GMT
Organization: Eskimo North (206) For-Ever
Lines: 45
Message-ID: <62ejvl$fpk$1@eskinews.eskimo.com>
NNTP-Posting-Host: eskimo.com
Xref: news.columbia.edu comp.protocols.kermit.misc:7925
I use the following macro to connect with my ISP, and to reject the
one line of theirs I know to be unreliable, restarting the dialing
process if I detect that line. I'd like the thing to beep at me
when it eventually connects, so I know to drop whatever else I'm
doing, but to stay quiet otherwise.
For some reason, this macro beeps every time it finds the bad modem
and restarts. Can someone explain why?
One minor question: can someone explain the difference between the
apparently undocumented "beep" command (can't find reference to it
in the CK60 book, other than its use in a script example) and the
good old "echo \007" command? The effects are very different.
Thanks in advance,
jimo@eskimo.com
-----------------------------------------------------------------------
define eskimo {
while not defined \%1 {
askq \%1 {Eskimo Password: }
}
:retry
dial 258-0759
in 30 {Your Selection ==>} #Initial selector, choose service
output 1\13 #Select Eskimo
in 60 login: #Start login process
out jimo\13 #Look for: Hello ,CLI,,27,xxx@seattle2
clear input
in 30 {Welcome to eskimo.com} #Read Annex ID string
xif \find({CLI,,27},\v(input)) { #Start over if toxic modem
xif \find({@seattle2},\v(input)) {
echo {Aborting 27,,2}
goto retry
}
}
in 30 Password:
out \%1\13
in 60 {Main Command?}
out {!} #Start shell
# beep #doesn't beep until escape back to kermit
echo \007 #^G
connect /quietly
}
------------------------------------------------------------------